home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / program / 316 / libsrc / readdir.c < prev    next >
Encoding:
C/C++ Source or Header  |  1988-10-20  |  904 b   |  42 lines
  1. /*
  2.  *        Cross Development System for Atari ST 
  3.  *     Copyright (c) 1988, Memorial University of Newfoundland
  4.  *
  5.  *  A public domain implementation of BSD directory routines for MS-DOS/atari.
  6.  *  Written by Michael Rendell ({uunet,utai}michael@garfield), August 1897
  7.  *
  8.  * $Header: readdir.c,v 1.2 88/01/29 18:04:01 m68k Exp $
  9.  *
  10.  * jrd 1.2
  11.  *
  12.  * $Log:    readdir.c,v $
  13.  * Revision 1.1  88/01/29  18:04:01  m68k
  14.  * Initial revision
  15.  * 
  16.  */
  17.  
  18. #include <types.h>
  19. #include <dir.h>
  20. #include <string.h>
  21.  
  22. #ifndef    NULL
  23. # define    NULL    0
  24. #endif    /* NULL */
  25.  
  26. struct direct    *
  27. readdir(dirp)
  28.     DIR    *dirp;
  29. {
  30.     static    struct direct    dp;
  31.     
  32.     if (dirp->dd_cp == (struct _dircontents *) NULL)
  33.         return (struct direct *) NULL;
  34.     dp.d_namlen = dp.d_reclen =
  35.         strlen(strcpy(dp.d_name, dirp->dd_cp->_d_entry));
  36.     dp.d_ino = 0;
  37.     dirp->dd_cp = dirp->dd_cp->_d_next;
  38.     dirp->dd_loc++;
  39.  
  40.     return &dp;
  41. }
  42.